﻿Public Class Validador
    Public Shared Sub Validar(ByVal Condicao As Boolean, ByVal Excecao As String)
        If Condicao Then Throw New Excecao("" & Excecao)
    End Sub
End Class
